home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / cbv226.zip / QBBSBAT3.TXT < prev    next >
Text File  |  1990-06-01  |  1KB  |  77 lines
  1. @echo off
  2. rem This is the QuickBBS batch file I use on my own system
  3. rem Remove the leading @ if you're not running DOS 3.3
  4.  
  5. if "%1"=="m" goto maint
  6. if "%1"=="M" goto maint
  7.  
  8. rem That just lets me force the EVENT routine by entering
  9. rem C:\>qbbs m
  10.  
  11.  
  12. :start
  13. echo 
  14. echo Your quote for the day... > netlogo.txt
  15. echo. >> netlogo.txt
  16. quote >> netlogo.txt
  17. echo. >> netlogo.txt
  18. rem That just puts a random quote in my mailer's greeting file
  19.  
  20. bbs /f
  21. rem That's my front end mailer
  22.  
  23. if errorlevel 24 goto 2400
  24. if errorlevel 12 goto 1200
  25. if errorlevel 3 goto 300
  26. if errorlevel 2 goto maint
  27. if errorlevel 1 goto local
  28. goto quit
  29.  
  30. :2400
  31. quickbbs -B2400 -E0
  32. if errorlevel 10 goto cbv
  33. goto start
  34.  
  35. :1200
  36. quickbbs -B1200 -E0
  37. if errorlevel 10 goto cbv
  38. goto start
  39.  
  40. :300
  41. quickbbs -B300 -E0
  42. if errorlevel 10 goto cbv
  43. goto start
  44.  
  45. :local
  46. quickbbs -L -E0
  47. if errorlevel 10 goto cbv
  48. goto start
  49.  
  50. :restart
  51. quickbbs -r -e0
  52. if errorlevel 10 goto cbv
  53. goto start
  54.  
  55. :cbv
  56. cbv
  57. if errorlevel 1 goto restart
  58. goto start
  59.  
  60. :maint
  61. cd twars
  62. twmaint
  63. cd ..
  64. fd_upd
  65. userpack -B -D21
  66. usersort -B
  67. msgutils killrecv 7
  68. msgutils killcnt 1 2 3 5 6 7 8 -N100
  69. msgpack -B
  70. echo Backing up USERS.BBS...
  71. if exist USERS.BK2 del USERS.BK2
  72. if exist USERS.BK1 ren USERS.BK1 USERS.BK2
  73. copy USERS.BBS USERS.BK1
  74. goto start
  75.  
  76. :quit
  77.